Procedure MMDDToDDMM(DateIn:String;Var DateOut:String);

    This converts a string of the form  MM/DD/YYYY to the form DD/MM/YYYY
    or vice vera.  The given string  must  be  a full valid date, such as
    1/21/1993 or 1 January 1992.

    Examples

    MMDDToDDMM('1/13/1991',S) = S:='13/1/1991';

    MMDDToDDMM('13/1/1991',S) = S:='1/13/1991';